home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / asmbatch.arc / ASM2LIB.BAT < prev    next >
Encoding:
DOS Batch File  |  1986-06-12  |  1.9 KB  |  80 lines
  1. echo off
  2. rem ASM2LIB lib [asm]
  3. rem     lib - filename of library
  4. rem         1) extension must be "LIB"
  5. rem         2) extension must not be specified
  6. rem     asm - filename of Assembly source/object file (optional)
  7. rem         1) extension must not be specified
  8. rem         2) Source file must exist for operation #2
  9. rem         3) Object file should be in library for operation #3
  10. rem
  11. echo                        Assembler Library Manager
  12. echo  
  13. if .%1 == . goto nolib
  14. echo      0) Create library file
  15. echo      1) Review existing library file
  16. echo      2) Assemble and add procedure to library
  17. echo      3) Delete entry from library
  18. :again
  19. query Select number of operation:
  20. echo  
  21. if errorlevel 4 goto error
  22. if errorlevel 3 goto delete
  23. if errorlevel 2 goto add
  24. if errorlevel 1 goto review
  25. rem CREATE
  26. if not exist %1.lib goto cr1
  27. query LIB file exists.  Do you want to replace (Y/N)?
  28. if not errorlevel 1 goto endall
  29. ren %1.lib %1.bak
  30. :cr1
  31. libsetup
  32. lib %1
  33. echo %1 Library created
  34. goto endall
  35. :REVIEW
  36. if not exist %1.lib goto nolib
  37. lib %1,review.lst
  38. more<review.lst
  39. goto endall
  40. :ADD
  41. if not exist %1.lib goto nolib
  42. if .%2 == . goto nosource
  43. if exist %2 goto bad-ext
  44. if not exist %2.asm goto nofile
  45. masm %2 %2 %2 nul
  46. echo  Ctrl-C to stop if errors 
  47. pause
  48. lib %1 -%2+%2;
  49. erase %2.obj
  50. echo  %2 Module added to library: %1
  51. goto endall
  52. :nosource
  53. echo  No source file specified...
  54. goto endall
  55. :bad-ext
  56. echo  ASM must NOT be specified
  57. goto endall
  58. :nofile
  59. echo  Source file does not exist
  60. goto endall
  61. :DELETE
  62. query Are you sure?
  63. if errorlevel 1 goto del1
  64. goto endall
  65. :del1
  66. if not exist %1.lib goto nolib
  67. if .%2 == . goto nodel
  68. lib %1 -%2;
  69. echo %2 Deleted from library: %1
  70. goto endall
  71. :nodel
  72. echo  No entry specified for deletion
  73. goto endall
  74. :error
  75. echo  Invalid response (use digits 0-3)
  76. goto again
  77. :nolib
  78. echo  Library file does not exist or not specified
  79. :endall
  80.